home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 March / EnigmA AMIGA RUN 05 (1996)(G.R. Edizioni)(IT)[!][issue 1996-03][Skylink CD IV].iso / earcd / faq / kjvcbibl.lha / cbible / rexx / jumpnew.thnkr < prev    next >
Text File  |  1992-05-31  |  216b  |  11 lines
  1. /* open new window to anchor statement */
  2. options results
  3. trace off
  4. address 'Thinker'
  5. get filename
  6. fn = result
  7. get blocknumber
  8. bn = result
  9. window open '0,100,640,100'
  10. jump origin fn
  11. jump label first  '0' || bn || 'b'